home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ Win2K ActiveDirectory Browsing 1.xpl < prev    next >
Text File  |  2004-02-05  |  1KB  |  38 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH 1"="Appearance\Desktop\Icons\'My Network Neighborhood' Options"
  5. "UIPATH 2"="Network\Explorer"
  6. "NAME"="Show ActiveDirectory link"
  7. "LANGUAGE"="VBScript"
  8. "TEXT 1"="Show ActiveDirectory in My Network Places"
  9. "DESCRIPTION 1"="When you are connected to a domain in Windows, Windows will also display a link to browse the ActiveDirectory of that domain."
  10. "DESCRIPTION 2"="If this setting is enabled, you can see this link which is the default setting of Windows. If you deactivate (uncheck) it, this link will not be visible any more."
  11. "COMMENT 1"="----"
  12. "VERSION"="1.03"
  13. "AUTHOR"="Xteq Systems"
  14. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  15. "CONTACTURL"="http://www.xteq.com/"
  16. "OSVERSION"="0001011"
  17.  
  18. sP="HKEY_CURRENT_USER\SOFTWARE\Policies\Microsoft\Windows\Directory UI\HideDirectoryFolder" 'DW
  19.  
  20. SUB Plugin_Initialize
  21.  s=RegReadValue(sP)
  22.  if s=0 OR IsEmpty(s) then
  23.     Call SetUIElement(1,true)
  24.  end if
  25. END SUB
  26.  
  27. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  28.  s=GetUIElement(1)
  29.  if s=true then
  30.     if RegValueExists(sP) then Call RegDeleteValue(sP)
  31.  else
  32.     Call RegWriteValue(sP,1,2)
  33.  end if
  34. END SUB
  35.  
  36. SUB Plugin_Terminate
  37. END SUB
  38.